home *** CD-ROM | disk | FTP | other *** search
/ Amiga Plus 1997 #3 / Amiga Plus CD - 1997 - No. 03.iso / pd / programmierung / alienbreed3d2_src / cheesesauce / abreed3.lha / LevelData2 < prev    next >
Text File  |  1995-09-11  |  3KB  |  149 lines
  1.  
  2.  
  3. *************************************************************
  4. * SET UP INITIAL POSITION OF PLAYER *************************
  5. *************************************************************
  6.  
  7. INITPLAYER:
  8.  move.l LEVELDATA,a1
  9.  move.w 4(a1),d0
  10.  move.l ZoneAdds,a0
  11.  move.l (a0,d0.w*4),d0
  12.  add.l LEVELDATA,d0
  13.  move.l d0,PLR1_Roompt
  14.  move.l PLR1_Roompt,a0
  15.  move.l ToZoneFloor(a0),d0
  16.  sub.l #playerheight,d0
  17.  move.l d0,PLR1s_yoff
  18.  move.l d0,PLR1_yoff
  19.  move.l d0,PLR1_tyoff
  20.  move.l d0,PLR1_yoff
  21.  move.l PLR1_Roompt,PLR1_OldRoompt
  22.  
  23.  move.l LEVELDATA,a1
  24.  move.w 10(a1),d0
  25.  move.l ZoneAdds,a0
  26.  move.l (a0,d0.w*4),d0
  27.  add.l LEVELDATA,d0
  28.  move.l d0,PLR2_Roompt
  29.  move.l PLR2_Roompt,a0
  30.  move.l ToZoneFloor(a0),d0
  31.  sub.l #playerheight,d0
  32.  move.l d0,PLR2s_yoff
  33.  move.l d0,PLR2_yoff
  34.  move.l d0,PLR2_tyoff
  35.  move.l d0,PLR2_yoff
  36.  
  37.  move.l PLR2_Roompt,PLR2_OldRoompt
  38.  
  39.  
  40.  move.w (a1),PLR1s_xoff
  41.  move.w 2(a1),PLR1s_zoff 
  42.  move.w (a1),PLR1_xoff
  43.  move.w 2(a1),PLR1_zoff 
  44.  move.w 6(a1),PLR2s_xoff
  45.  move.w 8(a1),PLR2s_zoff 
  46.  move.w 6(a1),PLR2_xoff
  47.  move.w 8(a1),PLR2_zoff 
  48.  rts
  49.  
  50. *************************************************
  51. * Floor lines:                                  *
  52. * A floor line is a line seperating two rooms.  *
  53. * The data for the line is therefore:           *
  54. * x,y,dx,dy,Room1,Room2                         *
  55. * For ease of editing the lines are initially   *
  56. * stored in the form startpt,endpt,Room1,Room2  *
  57. * and the program calculates x,y,dx and dy from *
  58. * this information and stores it in a buffer.   *
  59. *************************************************
  60.  
  61. PointsToRotatePtr: dc.l 0
  62.  
  63. ***************************************
  64. LEVELDATA:
  65.  dc.l 0
  66.  
  67. ;LEVELDATAD: ds.b 100000
  68.  
  69. ; ds.b 100000
  70. ; incbin "tstlev.bin"
  71. ***************************************
  72.  
  73. *************************************************************
  74. * ROOM GRAPHICAL DESCRIPTIONS : WALLS AND FLOORS ************
  75. ************************************************************* 
  76.  
  77. CONNECT_TABLE: dc.l 0
  78. ListOfGraphRooms: dc.l 0
  79. NastyShotData: dc.l 0
  80. ObjectPoints: dc.l 0
  81. PlayerShotData: dc.l 0
  82. ObjectData: dc.l 0
  83. FloorLines: dc.l 0
  84. Points: dc.l 0
  85. PLR1_Obj: dc.l 0
  86. PLR2_Obj: dc.l 0
  87. ZoneGraphAdds: dc.l 0
  88. ZoneAdds: dc.l 0
  89. NumObjectPoints: dc.w 0
  90. LiftData: dc.l 0
  91. DoorData: dc.l 0
  92. SwitchData: dc.l 0
  93. CPtPos: dc.l 0
  94. NumCPts: dc.w 0
  95. OtherNastyData: dc.l 0
  96.  
  97. wall SET 0
  98. seethruwall SET 13
  99. floor SET 1
  100. roof SET 2
  101. setclip SET 3
  102. object SET 4
  103. curve SET 5
  104. light SET 6
  105. water SET 7
  106. bumpfloor SET 8
  107. bumproof SET 9
  108. smoothfloor SET 10
  109. smoothroof SET 11
  110. backdrop SET 12
  111.  
  112. GreenStone SET 0
  113. MetalA SET 4096
  114. MetalB SET 4096*2
  115. MetalC SET 4096*3
  116. Marble SET 4096*4
  117. BulkHead SET 4096*5
  118. SpaceWall SET 4096*6
  119. Sand SET 0
  120. MarbleFloor SET 2
  121. RoofLights SET 256
  122. GreyRoof SET 258
  123.  
  124. BackGraph:
  125.  dc.w -1
  126.  dc.w backdrop
  127.  dc.l -1
  128.  
  129. NullClip:
  130.  dc.l 0
  131.  
  132. LEVELGRAPHICS:
  133.  dc.l 0
  134.  
  135. ;LEVELGRAPHICSD:
  136. ; ds.b 50000
  137.  
  138. ; ds.b 50000
  139. ; incbin "tstlev.graph.bin"
  140. LEVELCLIPS: 
  141.  dc.l 0
  142.  
  143. ;LEVELCLIPSD:
  144. ; ds.b 50000
  145. ; ds.b 50000
  146. ; incbin "tstlev.clips"
  147.  
  148. ControlPts:
  149. ; incbin "ab3:includes/newlev.map"